﻿Public Class frmMenuAuditoria
    Public empleadoId As Integer
    Public empleadoNombre As String

    Private Sub ConsultarPresentacionesToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ConsultarPresentacionesToolStripMenuItem.Click
        frmConsultarPresentaciones.ShowDialog()
    End Sub

    Private Sub SalirToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Me.Close()
    End Sub

    Private Sub ImportarDatosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ImportarDatosToolStripMenuItem.Click
        ImportarTablas.ShowDialog()
    End Sub

    Private Sub CerrarSesiónToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CerrarSesiónToolStripMenuItem.Click
        If MsgBox("Desea abandonar la sesión", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "Confirmación") = MsgBoxResult.Yes Then
            empleadoId = 0
            frmLogin.Show()
            Me.Dispose()
        End If
    End Sub

    Private Sub CambiarContraseñaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CambiarContraseñaToolStripMenuItem.Click
        frmCambiarContrasena.ShowDialog()
    End Sub

    Private Sub CargarNotasDeCréditoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        frmNotasCredito.ShowDialog()
    End Sub

    Private Sub SupervisarConsultasToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SupervisarConsultasToolStripMenuItem.Click
        frmSupervisarConsultas.ShowDialog()
    End Sub

    Private Sub RegistrarRecepciónToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        frmRegistrarRecepcionPresentacion.ShowDialog()
    End Sub

    Private Sub ComprobantesRecepciónToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComprobantesRecepciónToolStripMenuItem.Click
        frmConsultarRecepciones.ShowDialog()
    End Sub

    Private Sub ResumenDeCuentaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ResumenDeCuentaToolStripMenuItem.Click
        frmConsultarCuentasCorrientes.ShowDialog()
    End Sub

    Private Sub PlanDeCuentasToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PlanDeCuentasToolStripMenuItem.Click
        frmPlanDeCuentas.ShowDialog()
    End Sub

    Private Sub NotasDeCréditoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NotasDeCréditoToolStripMenuItem.Click
        frmNotasCredito.ShowDialog()
    End Sub

    Private Sub DébitosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DébitosToolStripMenuItem.Click
        frmDebitos.ShowDialog()
    End Sub

    Private Sub frmMenuAuditoria_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
        Me.Dispose()
        frmLogin.Dispose()
        frmPresentacion.Dispose()
    End Sub

    Private Sub CronogramasToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        frmCronogramaPresentacion.ShowDialog()
    End Sub

    Private Sub RegistrarConsultasToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RegistrarConsultasToolStripMenuItem1.Click
        frmConsultasFarmacias.ShowDialog()
    End Sub

    Private Sub CronogramasPresentaciónToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CronogramasPresentaciónToolStripMenuItem.Click
        frmCronogramaPresentacion.ShowDialog()
    End Sub

    Private Sub RegistrarCarátulasCAFAPROToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RegistrarCarátulasCAFAPROToolStripMenuItem.Click
        frmCargaCaratula.ShowDialog()
    End Sub

    Private Sub CompararCarátulasToolStripMenuItem_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CompararCarátulasToolStripMenuItem.Click
        frmCompararCaratulas.ShowDialog()
    End Sub

    Private Sub RealizarCierresToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RealizarCierresToolStripMenuItem.Click
        frmConsultarCierresObraSocial.ShowDialog()
    End Sub

    Private Sub ListarCobrosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListarCobrosToolStripMenuItem.Click
        frmConsultarCobros.ShowDialog()
    End Sub

    Private Sub OrdenDePagoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OrdenDePagoToolStripMenuItem.Click
        frmRegistrarOrdenPago.ShowDialog()
    End Sub
End Class